;AppVarLib Include File

 INCLUDE "libraries.inc"
 UseLibrary AppVar



 CreateRoutine AppVar,IfAppVarExist,0,0
 CreateRoutine AppVar,IfAppVarNExist,0,0
 CreateRoutine AppVar,MakeAppVar,0,0


 EXTERN _WriteAppVar
 EXTERN _ReadAppVar

WriteAppVar MACRO first,second
       db     AppVarLib,_WriteAppVar
       dw     first,second
       if     second<VarA
       error  "syntax: WriteAppVar ValueNumber,Variable"
       error  "WriteAppVar second parameter must be Variable"
       endif
 ENDMAC

ReadAppVar MACRO first,second
       db     AppVarLib,_ReadAppVar
       dw     first,second
       if     second<VarA
       error  "syntax: ReadAppVar ValueNumber,Variable"
       error  "ReadAppVar second parameter must be Variable"
       endif
 ENDMAC
